home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / asm_msc1.arc / GETDIGIT.DOC < prev    next >
Text File  |  1988-11-20  |  2KB  |  71 lines
  1.  
  2.        This program accepts a prompt from the command line and accepts
  3.        a one digit response to that prompt.  On exit, the DOS ERRORLEVEL
  4.        is set to the digit.  Non-numeric keys are ignored and <Ctrl><Break>
  5.        will not exit.
  6.  
  7.        This program requires DOS 2.0.
  8.  
  9.        Usage:
  10.          GETDIGIT prompt
  11.        where "prompt" is the message to displayed to the user.
  12.  
  13.        Example batch file usage:
  14.       echo off
  15.       :menu
  16.       cls
  17.       echo ---IBM PC Menu--
  18.       echo 1 - Run Wordstar
  19.       echo 2 - Run Dbase II
  20.       echo 3 - Exit to  DOS
  21.       GETDIGIT Please enter an option number:
  22.       if errorlevel 4 goto menu
  23.       if errorlevel 3 goto end
  24.       if errorlevel 2 goto dbase
  25.       if errorlevel 1 goto wordstar
  26.       :if we get here nothing matched -- try again
  27.       goto menu
  28.       :wordstar
  29.       cls
  30.       echo We would run WORDSTAR here.
  31.       pause
  32.       goto menu
  33.       :dbase
  34.       cls
  35.       echo We would run DBASE here.
  36.       pause
  37.       goto menu
  38.       :end
  39.       cls
  40.       echo on
  41.  
  42.        Copyright (C) 1983  Tony Alan Rhea
  43.        This program may be copied and distributed for personal use
  44.        but not for profit provided this notice is included.  Author makes
  45.        no warranty, expressed or implied, as to the correct nature and
  46.        operation of this software.
  47.  
  48.  
  49.        You may make and distribute as many copies of this program as you wish
  50.        for your PERSONAL use only ( NOT for business purposes, please! ).
  51.        Feel free to modify, mutilate, or adulterate this program.  If you come
  52.        up with an bug or improvement, please let me know by writing me at this
  53.        address:
  54.            Tony A. Rhea
  55.            1030 Ivy Lane
  56.            Cary, NC  27511
  57.        If you do modify it, please give me credit in the program.  This helps
  58.        to preserve my ego and increase my fame (but, unfortunately, NOT my
  59.        financial status).  Also, I would appreciate a copy of the modified
  60.        version, preferably on disk (I'll be happy to return your diskette).
  61.  
  62.        If you like this program ( or HATE it ), please let me know.  Drop me
  63.        a line at the address given above.
  64.  
  65.        This program has been submitted for publication in PC-WORLD magazine.
  66.  
  67.  
  68.      Revision history:
  69.         rev 1.0  10/26/83                  { original release }
  70.  
  71.